home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 6 / PC World Interactive 6.iso / online / irchelp.EXE / k_and_b.txt < prev    next >
Text File  |  1996-11-27  |  1KB  |  46 lines
  1. IF you use any of these in your script Gimme credit
  2. Beacuse I created it all myself! Thanks!
  3.  
  4. -_WiReD
  5.  
  6.  
  7.  
  8. Events ( in case you need this it is the Ban Pro )
  9.  
  10. !1:On Ban:#:{
  11.   if ( $banmask iswm $address($me,1)) goto meban
  12.   if ( $banmask iswm $address($me,2)) goto meban
  13.   if ( $banmask iswm $address($me,3)) goto meban
  14.   if ( $banmask iswm $address($me,4)) goto meban
  15.   if ( $bnick iswm $banmask ) goto meban
  16.   else goto end
  17.   :meban
  18.   If ( $me isop $chan ) goto unban
  19.   else goto noop
  20.   :unban
  21.   mode $chan -o-b $nick $banmask
  22.   kick $chan $nick Wired's Script Version 3 ( Badd.. Very very Bad man )
  23.   notice $nick Hey DONT ban me from this chan! 
  24.   notice $nick Wired's Script Version 3
  25.   echo 5 $active  You have been Un-Banned!
  26.   echo 5 $active Wired's Script Version 3
  27.   goto end
  28.   :noop
  29.   echo 5 $active Sorry your not an op in $chan! Normally You would unban yourslelf then deop that person and kick 'em ;)
  30.   echo 5 $active Wired's Script Version 3
  31.   :end
  32.   echo 5 $active Mode Ban +b $banmask In $chan
  33. }
  34.  
  35. Events Again
  36.  
  37. !1:On Kick:#:{
  38.   If ( $knick == $me ) goto mkick
  39.   else goto end
  40.   :mkick
  41.   join $chan
  42.   timer54 1 5 /ban $chan $nick 3
  43.   timer55 1 5 /kick $chan $nick Wired's Script Version 3 ( Hey Dont EVER kick me! )
  44.   :end
  45.   echo 5 $active Kick in $chan $nick kicked $knick $+ !
  46. }